home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Shareware World / Network / mRobot / Maintenance Robot / Maintenance Robot.rsrc / LENS_130_Administration < prev    next >
Text File  |  1998-11-01  |  7KB  |  228 lines
  1. ItemType: WIND
  2. Rect: 352,198,671,449
  3. Style: Window
  4. HasTitleBar: TRUE
  5. HasZoomBox: FALSE
  6. HasCloseBox: FALSE
  7. HasGrowBox: FALSE
  8. MinSize: 100,50
  9. MaxSize: 865,597
  10. Name: Administration
  11. WhiteColor: -4370,-4370,-4370
  12. Script: global virexHasRun,techtoolHasRun, floatB¬if objValue="Open" then   ¬  put dCod("prof",700) into n¬  put xLat(Str,n) into virexHasRun    ¬  if virexHasRun = 0 then¬    wsSet wdID,"24","Hilite", "TRUE"¬    wsSet wdID,"26","Text", "Will Run This Month"¬  else¬    wsSet wdID,"24","Hilite", "FALSE"¬    wsSet wdID,"26","Text", "Has Already Run This Month"¬  end if  ¬  put dCod("prof",701) into o¬  put xLat(Str,o) into techtoolHasRun¬  if techtoolHasRun = 0 then¬    wsSet wdID,"25","Hilite", "TRUE"¬    wsSet wdID,"27","Text", "Will Run Run This Week"¬  else¬    wsSet wdID,"25","Hilite", "FALSE"¬    wsSet wdID,"27","Text", "Has Already Run This Week"¬  end if  ¬  put dCod("prof",702) into p¬  put xLat(Str,p) into theDay¬  set i8_SelectionText of window "Administration" to theDay¬  put dCod("prof",703) into q¬  put xLat(Str,q) into theDayName¬  set i10_SelectionText of window "Administration" to theDayName  ¬  put dCod("prof",706) into hf¬  put xLat(Str,hf) into thedefnLoc¬  wsSet wdID,"23","Text", thedefnLoc¬  if thedefnLoc ≠ "" then¬    wsSet wdID,"12","Disabled", "FALSE"¬    wsSet wdID,"30","Disabled", "FALSE"¬  else¬    wsSet wdID,"12","Disabled", "TRUE"¬    wsSet wdID,"30","Disabled", "TRUE"¬  end if¬end if
  13.  
  14. ItemType: TEXT
  15. Rect: 213,457,223,469
  16. TextFont: Geneva
  17. TextSize: 9
  18. Text: 0
  19.  
  20. ItemType: LBL
  21. Rect: 39,362,68,374
  22. TextFont: Geneva
  23. TextSize: 9
  24. AutoSize: FALSE
  25. Text: Virus
  26.  
  27. ItemType: LBL
  28. Rect: 121,362,165,374
  29. TextFont: Geneva
  30. TextSize: 9
  31. AutoSize: FALSE
  32. Text: Desktop
  33.  
  34. ItemType: TEXT
  35. Rect: 287,457,297,469
  36. TextFont: Geneva
  37. TextSize: 9
  38. Text: 0
  39.  
  40. ItemType: LBL
  41. Rect: 15,11,248,23
  42. TextFont: Geneva
  43. TextSize: 9
  44. TextStyle: Bold
  45. AutoSize: FALSE
  46. Text: Robot's State After Closing
  47.  
  48. ItemType: LBL
  49. Rect: 14,87,180,99
  50. TextFont: Geneva
  51. TextSize: 9
  52. AutoSize: FALSE
  53. Text: Display Virus Def'n Reminder On Day
  54.  
  55. ItemType: LBL
  56. Rect: 14,104,202,116
  57. TextFont: Geneva
  58. TextSize: 9
  59. AutoSize: FALSE
  60. Text: Display Rebuild Desktop Reminder Every
  61.  
  62. ItemType: POP
  63. Rect: 185,88,229,101
  64. TextFont: Geneva
  65. TextSize: 9
  66. AutoSize: FALSE
  67. Text: 1¬2¬3¬4¬5¬6¬7¬8¬9¬10¬11¬12¬13¬14¬15¬16¬17¬18¬19¬20¬21¬22¬23¬24¬25¬26¬27¬28¬29¬30¬31
  68.  
  69. ItemType: LBL
  70. Rect: 236,87,307,100
  71. TextFont: Geneva
  72. TextSize: 9
  73. AutoSize: FALSE
  74. Text: Of Each Month
  75.  
  76. ItemType: POP
  77. Rect: 202,105,299,118
  78. TextFont: Geneva
  79. TextSize: 9
  80. AutoSize: FALSE
  81. Text: Sunday¬Monday¬Tuesday¬Wednesday¬Thursday¬Friday¬Saturday
  82.  
  83. ItemType: LBL
  84. Rect: 14,68,119,80
  85. TextFont: Geneva
  86. TextSize: 9
  87. TextStyle: Bold
  88. AutoSize: FALSE
  89. Text: Reminder Settings
  90.  
  91. ItemType: PUSH
  92. Rect: 233,217,305,237
  93. AutoSize: FALSE
  94. Name: Set
  95. DefaultItem: TRUE
  96. AutoClose: TRUE
  97. Script: global virexHasRun,techtoolHasRun¬put wsGet(wdID,"24","Hilite") into jj¬if jj = "TRUE" then¬  put 0 into vRun¬else¬  put 1 into vRun¬end if¬put xLat(Res,vRun) into y¬nCod "prof",700,"virex",y¬put wsGet(wdID,"25","Hilite") into jc¬if jc = "TRUE" then¬  put 0 into tRun¬else¬  put 1 into tRun¬end if¬put xLat(Res,tRun) into z¬nCod "prof",701,"techtool",z¬put i8_SelectionText of window "Administration" into dDay¬put xLat(Res,dDay) into w¬nCod "prof",702,"day",w¬put i10_SelectionText of window "Administration" into dName¬put xLat(Res,dName) into g¬nCod "prof",703,"dayname",g¬put i23_Text of window "Administration" into xf¬put xLat(Res,xf) into j¬nCod "prof",706,"defnloc",j¬quit
  98.  
  99. ItemType: LBL
  100. Rect: 14,133,223,145
  101. TextFont: Geneva
  102. TextSize: 9
  103. TextStyle: Bold
  104. AutoSize: FALSE
  105. Text: Virus Definition File Location
  106.  
  107. ItemType: PUSH
  108. Rect: 30,430,89,446
  109. TextFont: Geneva
  110. TextSize: 9
  111. AutoSize: FALSE
  112. Name: Virus App
  113. Script: answer file "Locate Virus Application..." of type "APPL"¬if it is not empty then¬  put it into b¬  set i16_text of window "Administration" to b¬end if
  114.  
  115. ItemType: PUSH
  116. Rect: 10,444,69,460
  117. TextFont: Geneva
  118. TextSize: 9
  119. AutoSize: FALSE
  120. Name: TechTool...
  121. Script: put "µMTT" into caseNoTwo¬put "false" into jm¬put GetAppPath(caseNoTwo, jm) into c¬set i19_text of window "Administration" to c
  122.  
  123. ItemType: TEXT
  124. Rect: 94,432,313,474
  125. TextFont: Geneva
  126. TextSize: 9
  127. AutoSize: FALSE
  128. WhiteColor: -4370,-4370,-4370
  129.  
  130. ItemType: LINE
  131. Rect: 14,62,306,63
  132. AutoSize: FALSE
  133.  
  134. ItemType: LINE
  135. Rect: 14,63,306,64
  136. AutoSize: FALSE
  137. Pen: White
  138.  
  139. ItemType: TEXT
  140. Rect: 74,446,293,474
  141. TextFont: Geneva
  142. TextSize: 9
  143. AutoSize: FALSE
  144. WhiteColor: -4370,-4370,-4370
  145.  
  146. ItemType: LINE
  147. Rect: 15,125,307,126
  148. AutoSize: FALSE
  149.  
  150. ItemType: LINE
  151. Rect: 15,126,307,127
  152. AutoSize: FALSE
  153. Pen: White
  154.  
  155. ItemType: PUSH
  156. Rect: 15,156,74,172
  157. TextFont: Geneva
  158. TextSize: 9
  159. AutoSize: FALSE
  160. Name: Locate...
  161. Script: answer file "Locate Virus Definitons..."¬if it is not empty then¬  put it into fileName¬  set i23_text of window "Administration" to fileName¬  set i12_Disabled of window "Administration" to "FALSE"¬  set i30_Disabled of window "Administration" to "FALSE"¬end if
  162.  
  163. ItemType: TEXT
  164. Rect: 79,153,307,195
  165. TextFont: Geneva
  166. TextSize: 9
  167. AutoSize: FALSE
  168.  
  169. ItemType: CHK
  170. Rect: 13,29,162,41
  171. TextFont: Geneva
  172. TextSize: 9
  173. AutoSize: FALSE
  174. WhiteColor: -4370,-4370,-4370
  175. Name: Virus Def'n Update Reminder
  176. Hilite: TRUE
  177. Script: put wsGet(wdID,"24","Hilite") into jj¬if jj = "TRUE" then¬  wsSet wdID,"26","Text", "Will Run This Month"¬else¬  wsSet wdID,"26","Text", "Has Already Run This Month"¬end if
  178.  
  179. ItemType: CHK
  180. Rect: 167,28,300,41
  181. TextFont: Geneva
  182. TextSize: 9
  183. AutoSize: FALSE
  184. WhiteColor: -4370,-4370,-4370
  185. Name: Desktop Rebuild Reminder
  186. Hilite: TRUE
  187. Script: put wsGet(wdID,"25","Hilite") into js¬if js = "TRUE" then¬  wsSet wdID,"27","Text", "Will Run This Week"¬else¬  wsSet wdID,"27","Text", "Has Already Run This Week"¬end if
  188.  
  189. ItemType: TEXT
  190. Rect: 30,41,159,55
  191. TextFont: Geneva
  192. TextSize: 9
  193. AutoSize: FALSE
  194. WhiteColor: -4370,-4370,-4370
  195. Text: Will Run This Month
  196.  
  197. ItemType: TEXT
  198. Rect: 184,41,308,55
  199. TextFont: Geneva
  200. TextSize: 9
  201. AutoSize: FALSE
  202. WhiteColor: -4370,-4370,-4370
  203. Text: Will Run Run This Week
  204.  
  205. ItemType: PICT
  206. Rect: 15,208,47,240
  207. AutoSize: FALSE
  208. ID: 1033
  209. Logic: Push
  210. Script: global floatB¬wsSet wdID,"28","ID", "1034"¬wsSend wdID,"28","DoUpdate"¬put 1 into floatB¬get windowscript("about")
  211.  
  212. ItemType: BOX
  213. Rect: 78,152,308,196
  214.  
  215. ItemType: PUSH
  216. Rect: 15,176,74,192
  217. TextFont: Geneva
  218. TextSize: 9
  219. AutoSize: FALSE
  220. Name: Clear
  221. Script: set i23_text of window "Administration" to ""¬set i12_Disabled of window "Administration" to "TRUE"¬set i30_Disabled of window "Administration" to "TRUE"
  222.  
  223. ItemType: PUSH
  224. Rect: 151,217,223,237
  225. AutoSize: FALSE
  226. Name: Cancel
  227. AutoClose: TRUE
  228. Script: quit